home *** CD-ROM | disk | FTP | other *** search
/ CyberMycha Extra 2004 January / CyberMycha Extra 1-2004 (Poland) (Disc 2).bin / Pippi / gmsl.dir / Internal_53_hinder&Hidden.ls < prev    next >
Encoding:
Text File  |  2001-09-04  |  438 b   |  21 lines
  1. property meSprite, pippiMate, hiddenObject, found
  2. global gmObject
  3.  
  4. on beginSprite me
  5.   found = 0
  6.   meSprite = sprite(me.spriteNum)
  7.   pippiMate = gmObject.pippiMate
  8.   gmObject.reportHinder(meSprite)
  9.   hiddenObject = gmObject.reportHidden()
  10. end
  11.  
  12. on exitFrame me
  13.   if pippiMate.intersects(meSprite) = 1 then
  14.     gmObject.stopMe(meSprite, 0)
  15.     if found = 0 then
  16.       gmObject.stopFind(hiddenObject)
  17.       found = 1
  18.     end if
  19.   end if
  20. end
  21.